; simple sample :
	
	Local res=Tokenize("Simple string to tokenize", " ", "")
	Local t=ListFirst(res)
	While t
		Write "'"+LinkValue(t)+"' "
		t=AfterLink(t)
	Wend
	Print ""
	Print ""


; Parser sample
	
; - Parse String -
	; a string to find
	Local Name$		=	"You"
	; String to tokenize
	Local Chaine$	=	"Hello "+Name+",How are you today ? Me, I'm Fine ! ^^"
	; Delimiters ( chars that will be destroyed from string and used to split 'words' )
	Local Delims$	=	" "+Chr(9) ; 'space' and 'tab'
	; Symbols are delimiters that will be exported in the token-list
	Local Symbols$	=	"',.?!*-+/\(){}[]%$#~^"
	
	Local List=Tokenize(Chaine, Delims, Symbols)
	Local tok1=ListFirst(List), symbol=False
	While tok1
		If Instr(Symbols,LinkValue(tok1))
			Color 000,255,255
			Write LinkValue(tok1)
			If Instr(",?!",LinkValue(tok1)) Then Write " "
			symbol = True
		Else
			Color 255,255,000 : If LinkValue(tok1)=Name Then Color 255,128,000
			If Not(symbol) Write " "
			Write LinkValue(tok1)
			symbol = False
		EndIf
		tok1=AfterLink(tok1)
	Wend
	
WaitKey
End

;~IDEal Editor Parameters:
;~C#Blitz3D